SPACE INVADERS GAME ) 

CRAB1A ) 

CRAB1B ) 

CRAB2A ) 

CRAB2E ) 

CRAB3A ) 

CRAB3E ) 

UFO ) DECIMAL DATA UFO 3 B, 18 B, BINARY OB, 
UFO DATA TABLE CONTINUED ) 

ADDITIONAL UFO PATTERNS > 

YET ANOTHER UFO PATTERN ) 

BOMB PATTERNS FOR SPACE INVADERS ) 

BOMB PATTERNS STYLE 2 ) 

SPACE MISSIONS INVADERS BACKGROUND SCORE ) HE) 
INVADERS- LARGE INVADER, IA ) HEX 
MISSIONS- TAKE-OFF- TO > HEX 
SPACE INVADERS GAME ) 

MORE GOODIES ) DECIMAL 
CONTINUED PATTERN MAKER ) 

SPACE INVADERS RACK COORDINATE BUMPER ROUTINE 
LOCAL FORCE FIELD GOODIES ) 

FIREBASE STUFF FOR SPACE INVADERS ) 

GOODIES TO EXPLODE A BOMB ) 

CHECK FOR BOMB INTERCEPT ) HEX 
BOMB INTERCEPT CHECKER CONTINUED ) 

PHASOR INTERCEPT CHECK ROUTINE ) 


INVADERS ) 

BACKGROUND SCORE 
- IA J HEX 
> HEX 


OB, 


ANIMAT 


SCORES 


SUBROUTINE TO DROP A 

BOMBER CONTINUED > 
GORF BOUNCE ANIMATION 

1 T | jvji 


BOMB 


POSSIBLE 


S8 5 C C '•'■'•CT .. r 3 xACK HCTRE TABLE 








[ 00 - 


0 

1 

2 

3 

4 

5 
S 
7 
S 
9 

10 
11 
12 

13 

14 

15 


DATA G3AE 
DECIMAL — 


0 B, 


H 

0 

1 

h- 

< CRAB1A 
DECIMAL 

tSIOCK 101 

) 

DATA CRAE1A 

3 B 

JF 

S B 

2 

3 

BINARY 

00010001 

B, 

@1000000 

B , 

0 

B, 

4 

01000101 

B, 

@1@1@@@@ 

B , 

0 

B, 

5 

00000001 

B j? 

1©@1010© 

B , 

0 

B, 

6 

00000101 

E > 

©1 ©101©1 

P 

•O J 

0 

B s 

7 

00000101 

B , 

@ 1 @ 1 @ 1 0 1 

B; 

© 

3, 

S 

00000001 

B j 

1 © © 1 © 1 @ @ 

B 

© 

B, 

S 

01000101 

B, 

©1@1@©@© 

is- J 

0 

E, 

10 

00010001 

B, 

© 1 © © © © 0 0 

B j? 

0 

B , 


1 1 
12 

13 

14 

15 

0 

1 

2 

3 

4 

5 
G 

7 

8 
■9 

1 0 
I 1 
19 
13 


-l-g lock 102 

< CRAE1E ) 

DECIMAL DATA CRABIB 
BINARY 


3 B> SB, 


01000001 
00010001 
01000101 
■00010001 

J 00010001 

1 @ 1 @ 00 1 

S @@@1@@01 


B; 

B j? 

B j 
B , 


©1@@@000 

10010100 

$ 4'ft 4 O. 4 A 4 

*'s ••• 4 •ft 

,,-v r -~\ .-•> 


E j 
B / 

•B j 


0 B. 
© B. 

© B. 

ft P 


S 0 < 


15 ! 












-B1 ock 


1®3- 


0 


< CRAB2A 

) 





1 

1 

DECIMAL 

DATA 

CRAB2A 

3 B 

r 

11 B 

2 

1 

1 

00000010 

B, 

10101000 

B , 

0 

B, 

3 

1 

1 

10001010 

B, 

1@00000© 

B i 

@ 

B, 

4 

I 

I 

00101010 

B, 

10100010 

3, 

© 

B j 

5 

6 

1 

00001010 

H* it 

0110i0@@ 

•n 
—? s 

©■ 

B , 

6 

1 

1 

00001010 

B } 

10100000 

B jp 

0 

B , 

7 

1 

1 

00001010 

B f 

10i©@@@@ 

B 9 

0 

B, 

8 

1 

1 

00001010 


10100000 

E jr 

© 

—• > 

9 

1 

1 

00001010 

j? 

@. 1 1 f J 1 @ © 0 

TO 

JCP / 

@ 

B, 

10 

1 

1 

00101010 

B 9 

101 @001 © 

B 9 

0 

B , 

11 

1 

1 

10001010 

E 9 

1@@@@@0@ 

T* 

© 

B t 

12 

13 

1 

1 

1 

i 

00000010 
-> 

m 

£> 9 


3 } 

0 

B i 


14 

15 

0 

1 

2 

3 

4 

5 

6 

7 

8 
B 

10 
11 
12 

13 

14 

15 


B; BINARY 


104- 


-BIock 

C CRAB2B ) 

DECIMAL DATA CRAB2B 3 


00000010 
00101010 
10001010 
10001010 
00001010 
10001010 
10001010 
00101010 
©0000010 


ifpji i^! g'pji 
10100010 
01101000 
101000 00 
10100000 
10100000 
01101@00 
1@100010 
1©@@©@@0 


B, 
B j? 

E j> 


B j 

B , 
B j 
B 9 


:, 11 

© 3 _ 
0 B 
© B 
0 E 
© B 
»0 B 


E, BINARY 


0 B. 

© B. 

@ B. 


00101010 


-B! ock 


H © 


fe? 3 - 


0 

! ( CRAB3A 

) 






1 

i DECIMAL 

D AT A 

CRAB3A 

3 B 

f 

12 

B, BINARY 

2 

! 1 100001 1 

E » 

11110©00 

B j? 

0 

B, 

11000011 

3 

! 001 1001 1 

y 

1i1111@0 

B j? 

© 

■£? j 

©01 1 1 1 1 1 

4 

j @0001 1 1 1 

T? 

Jf 

0©111111 

B j? 

@ 

B / 

i 

5 

j 001 1 ©01 1 

-1 J? 

^ r t- r. r n 

L k l A L „ ^ 


© 

TQl 

iD» JP 


e 

100110011 

B 

1 1 1111 1 1 

B , 

0 

— J p 


7 

! @0001 1 1 1 

"" - 

<i * •• r * 

7” 

r 3 

jy 


a 

f ! ‘1 

...... 

<■] ^ Cf 



vr> 


3 

l @©i 1 


y . ,•* r- r -• f -"'- 

■ ' P 

0 



4! fTj; 

■j A 1 0^ @ © *i ", 


/• l 

■ T ~ 




1 1 

j] f <! 00 0 0 ■? ‘1 

T ^ 

1 v 'i " OAA© 


r°> 


DECIMAL 


A £L \ 

13 ! 

14 ! 

15| 


© 010101 © B 9 © / 


B, 0 , HEX 


B i 111111@@ B f © B 9 

B/ @011110© B, 0 E, 














106 


+—--B1 ock 

0!( CRAB3B ) 


1 

DECIMAL 

DATA 

CRAE3B 

3 E 


12 

Bf BINARY 






2 

00000011 

Bf 

111 10000 

B, 

© 

B, 

00110011 

Bf 

11111100 

B, 

0 

B 

3 

11111111 

Bf 

11.11110© 

B f 

0 

Ef 

11001111 

Bf 

00111100 

B f 

0 

E 

4100001111 

B, 

001.1 1 5 1 1 

’O' 

■LJ J 

0 

B, 

©0110011 

Bf 

11111111 

Bf 

0 

B 

5 

00110011 

B.. 

jfl j* jg Jj| 4| 

TE» 
v J> J 

0 

Bf 

00001 111 

B, 

00111111 

B, 

0 ' 

B 

6 

11001 111 

Bf 

0© ■■ *2 i * 0@ 

B , 

10 

B / 







7 

11111111 

B f 

null 0@ 

B j? 

© 

Bf 







S 

00110011 

Bf 

1 1 ' 1 1 00 

■srs * 

0 

Bf 







9 

00000011 

B f 

111!0000 

33 / 

© 

Bf 

HEX 







10 ! — > 

11 ! 

12 i 

13 ! 

14 1 
15! 

H-——Block 1 07—-— 

0! ( UFO ) DECIMAL DATA UFO 3 B, IS E , BINARY 0 B , 0 B, 0 B, 
1 J 00001100 B j 00000000 B , 0 B, 

2100001111 B; 00000000 Bj 0 B, 

3!00011111 B; 11000000 B j 0 B f 
4101011101 B , 11110000 B, 0 B , 

5100011111 B, 1111000Q B j 0 3f 
6100001111 B, 11111100 B , 0 B , 

7i00001101 B ? 1111110 3 2, © 3, 

8 100111111 3, Ill'll 00 30 B , 

9 100111111 B, 1111 i 100 3.. @ 3, 

10 ! ©0001101 B, in' ■ 1 00 3; 0 3, 

11 !00001111 E t 111111@@ B, 0 B , 

12100011111 E; 11110000 Bf © Bf 
13101011101 B f 11110000 3, 0 B, 

14100011111 B, 11000000 E i ® 3, 

15 100001111 E 3 @0000000 3i 0 Bj —> 

H-Block 108--- 

01C UFO DATA TABLE CONTINUED ) 

1100001100 Bf 00000000 Bf 0 Bf 
210 B, 0 E, 0 3 , 

31 DEC IMAL 
4 1 — > 

51 

61 

7 1 ■ 

8 ! 

9! ' • ' 








+-Block 1 09- 


0i ( ADDITIONAL 

UFO PATTERNS 

) 




1iDATA 

UF02 3 B 

J 

11 B / 

QUAD 





2 10033 

B, 

0000 

B, 

0000 

B, 





313033 

B, 

0000 " 

B , 

000© 

3 / 





410333 

B, 

3000 

E jp 

000© 

E f 





510311 

B, 

3000 

B, 

©00© 

B / 





613333 

B, 

3300 

B , 

000© 

B / 





7 13311 

B f 

3300 

E } 

0000 

T> 

JJ J 





8 1 3333 

B, 

3300 

i£? f 

10 00 0 

B, 





9 ! 031 1 

B / 

3000 

B $ 

0®@0 

B, 





101 0333 

B , 

3000 

B, 

0000 

P 

j 





11 | 3033 

B, 

000© 

E j 

©00© 

ii JP 





1210033 

B, 

0000 

B , 

0000 

nii jp 





131 DEC IMAL 

— > 








141 










151 










+- 

— 

E 1 ock 


1 1© 

— 

— 




01C YET ANOTHER 

UFO PA 

TTERN 

) 




1 iDAT A 

UFO 

3 2 B 


B B j? 

QUAD 





2 1 0300 

E / 

0000 

rs 

jp 







3 10320 

B / 

0000 

E, 







4 | 1320 

B, 

©000 

B f 







510323 

B, 

0000 

jp 







610323 

B / 

0000 

B . 







7 1 1320 

B, 

000© 

E j? 







8 1 0320 'E, 

0 0 0 0 

E, 







9 1 0300 

B, 

0 0 0 0 

IT- - 

■lO J? 







10 1 DECIMAL 

-> 








11 ! 










12 1 










13 1 










14 j 










15 1 










+ -- 

-- 

B1 ock 


111 

--- 

— 




0j( BOMB PATTERNS 

FOR 

SPACE 

INVADERS 

: ) 


1 \ QUAD 

DAT 

A BOMB! 

3 B jp 

3 B j 

00 

10 B, 

001© 

210101 

E, 

©100 

E» 

fa 9 

1 0@© 

E, 

1 ©0© 

B , 

© 

3 | DATA 

E0MB2 3 

E j> 

3 E, 

©0©1 

E, 

0000 

B / 

0 

411010 

B, 

1010 

B , 

© B J? 

0 1 © © 

B, 

0100 

B, 

0 

5 IDATA 

BOMBS 3 

E , 

3 R 

© 1 00 

B, 

@1 @0 

B , 

0 

6 11010 

B / 

101© 

P 

f:-. in 

O001 

B, 

0000 

B, 

0 

1 7 | DAT A 

BOM 

iR S. ^ 

p 

*£ p 

1 © 0© 

B, 

1 ©00 

8, 

0 

8 S 01 01 

iS j? 

0 1 0@ 

p 

. © T P 

©0 1 © 

P 
.U’ jp 

0 

B, 

0 


3 i DECIMAL —> 
10 ! 

11 | 

12 1 

13 i 

14 l 

15 I 


f :~-’ w td m m m m m 









m & -si m in & us ro 


-B1 ook 


112- 


2 

3 

IDATA 

10001 

TOMB1 3 
B, 0010 

E, 

B ! 

3 

0 

B, 

B, 

©01© 

E, 

0100 

B, 

0 

B, 

1111 

B, 

1110 

E, 

0 

B 

4 

5 

[DATA 

| 1001 

T0MB2 3 

B, 0000 

E, 

B P 

‘3 

$ 

B, 

IP 

© 1 ©© 

B, 

1000 

E, 

@ 

E, 

1111 

B, 

1110 

B, 

0 

B 

6 

7 

[DATA 

[1010 

T0MB3 3 
B, 000© 

Bp 

p 

B t 

: 3 

0 

B f 

J? 

1001 

B, 

000© 

B, 

.0 

B, 

1111 

B , 

1110 

B p 

0 

B 

a 

s 

[DATA 
[ 1000 

T0MB4 3 

B, 0000 

ip 

B r 

V? 

B p 


«? 

100© 

B, 

0000 

E, 

0 

B, 

1111 

B, 

1110 

B, 

0 

B 


10 
11 
12 

13 

14 

15 

0 

1 

2 

3 

4 

5 

6 
7 
S 
9 

10 
11 
12 

13 

14 

15 


< BOMB PATTERNS STYLE 2 ) 

QUAD 


DECIMAL —> 


-E1ock 113- 

< SPACE MISSIONS INVADERS BACKGROUND SCORE ) HEX 
DATA THUMPSCORE 

FF 0F S -1 0 ©F MQVEVOLS 0F HITMO 
700 MOVESOUND ( no step size ! ) 

#C1 #CS1 *D1 TONES 
80 MASTER 36 4 SC 80 RAMP 

PLAY 

: TH THUMPSCORE E2MUSIC ; 


-g}ock 114- 

( INVADERS- LARGE INVADER, IA ) HEX 
DATA IASCORE 

3 1 © MOVESOUND 

24 MASTER 1 2 3© 2© RAMBLE 
I® -1 12 MOVELOWLIM 
3© -1 £ MQVEHJGHLIM 
*C2 #E2 TONES 

DD ABV0L3 ©D irC'-'CL" 


1 5 













0 

1 

*2 
3 
' 4 

5 

6 

7 

8 
9 

1© 
11 
12 

13 

14 

15 

O 

1 


+———-Block 115-——— 

( MISSIONS- TAKE-OFF- TO J HEX 

DATA TOlSCORE ; ' 

7 9 10 TONES 1 5 0 MOVESOUND 2 MASTER 3 0A 90 2 RAMP 
1 COUNTLIMITS 3 1 3 73 MOVENOISE 1C MCVOLS CC ABVOLS PLAY 
90 MASTER 3E 44 1! TONES 4 -1 90 74 RAMBLE 1 COUNTLIMITS 
1 1 20 MOVESOUND PLAY 74 MASTER 1 -1 74 2 RAMBLE 

SB 1-1 3 MOVENOISE RERAMBLE 1 COUNTLIMITS PLAY QUIET 
DATA T02SC0RE 

3 5 14 TONES 1 -5 3F MOVESOUND 2 

1 COUNTLIMITS 31 3 73 MOVENOISE 

2 MASTER 54 31 13 TONES 1 1 22 2 

1 -1 20 MOVESOUND FLAY 22 MASTER 
SB 1 -2 3 MOVENOISE RERAMBLE 1 C'OUNTL 

: TO T02SC0RE P2MUSIC TOISCORE PMUSIC 
DECIMAL IS 


-I-E 1 ock 15©- 

( SPACE INVADERS GAME ) 
TIMER© C= UFOTIMER 
— > 


MASTER 3 0A 30 2 RAMF 
1C MCVOLS CC ABVOLS PLAY 
RAMBLE 1 COUNTLIMITS 
1 1 7© 22 RAMBL 

. I HITS PLAY 


7F ! 


I ET 


-Block 151- 

C MORE GOODIES ) DECIMAL 

4 ARRAY INVADERFAT 4 ARRAY INVADERDROPAT 

32 EARRAY CRAB1 AE 100 BARRAY CRAE1ABD 42 BARRAY CRAB2AB 
100 EARRAY CRAE2ABD 44 BARRAY CRAB3AB 120 BARRAY CRAB3AED 
HEX : MAKEPATS CL 1000 1©00 CRAB1A 20 WRITEP 1000 1200 CRAB1B 
20 WRITEP S A @ CRABSAB 1000 1000 SNAP © CRABSAB 3 INVADERPAT ! 

|- 



G 

i 30@ 


2000 



20 'A 

a j rpp 

1 @00 

2 

p 7 7 

c 

RAB 

ji 

B 

7 ? 

0 

E |J 7 T 

T 

FP 


7 

]■ 14 A 


0 C R 

7 


*. 7 7 “1 7 7 7 

7000 

SNAP 

0 

CRAB 

-1 

ABB 


7 

I 

Nj 7 

6 T> IP 

R’ 

BROPAT 


Q 

: 20@0 


^ 777 


• ~~ 

-•~VaA 20 W 

7 Ij* 7 ~7 td 

717 7 


3 @ © 

c 

P 7 7 

7 

R 


7 

7 p r ~ 


r - id 


C; 

S D 

@ 

C R A 


2 A; 

1 2002 f 1 7 

0 © SN 

AP @ 

CP 

AB 2 A 

3 

2 

y 

NV 

A 

D ;u. 


t 


1 


23©0 


2 0 @ © 


f- rr- 

s T7' 7 A 7 7 

'~™ CT "Z 

P 7 7 @ 

7 

2 @ @ 

C 

P 7 7 

P 

7 

7 

0 

njp T 

T 

rp 

1 

i 

S' 1 4 D 


0 CE 

A 

7 7' / 

\ 7 7 f “• -A A’t 

: '777 

SNAP 

0 

CRAB 

P 

ABB 


7 

I 

n y 

A B E 

fP 

BP 0 PAP 

i 

2 ! 

\ 3000 


1 000 


7 

A, *; - 7 

T _ p 

3@0© 

jS 

& 

200 

c 

7 p, 7 

7 

7 , 

7 

7 

HR I 

T 

jrp 

i 

3 

] 8 E 

0 

CPA 

7 


7 7 7'"- •- 


A p 7 

CR 

7 ip 7 

B 

2 U 

p 

7 


IN 


: 

i 

4 ; 

! i IN 

vadef: 


A 

























+--Block 152-- 

01 ( CONTINUED PATTERN MAKER ) 

113300 2000 CRAE3A 20 WRITER 3000 2200 CRAE3B 20 WRITEP 

2114 E 0 CRAE3AEB 30@0 2000 SNAP 0 CRAE3ABD DUP 0 INVADERDROPAT ! 

31 1 INVADERDROPAT ! I 

41 ( SPACE INVADER NORMAL PATTERN TABLE > 

51 DATA INVNCRMLPAT CRABSA , CRAB3A , CRAE2A , CRAB1A ,0,0, 

610 , 0 , CRAE3B , CRAB3B , CRAB2B , CRAB1E ,©,0,0,0, 

7iDECIMAL ( MORE GOODIES ) 0 V= UGL 

6 I: DRGS UGL i DO 3 RND 1 - + DUP 0 = IF DROP 1 

9!ELSE DUP UGL 0 = IF 1 - THEN THEN DUP © I ROT 4 2 BOX 
1014 +LOOP ; 

Ilf: DRAWGROUND 4 5S 0 5 DRGS 192 5G 14 DRGS DROP ,* 

12 ! — > 

13 I 

14 1 

15 ! 

-t-Block 153- 

0[ ( SPACE INVADERS RACK COORDINATE BUMPER ROUTINE ) 

1 ISUBR INVBUMFER 

2!MASTERY LHLB, DMASTERY LBED, 7 B BIT, ©=, IF, INVUL LBCB, 

3!ELSE, INVLL LBCB, THEN, FLIPCHECK CALL, 

4!0 =, IF, DMASTERY SDED, DMASTERX LDED, MASTERX LHLB, 

5 ID DAD, MASTERX SHLB, H A MOV, 5 CPI, CY, IF, 

S! 1 A MV I, GAMEOVER STA, THEN, 0 INVADERDROPAT H LX I, 

71 ELSE, D DAD, MASTERY SHLB, O INVADERPAT H LXI, 

3!THEN, INVPA7AB SHLB, RET, 

9 i — > 

1 © ! 

11 ! 

12 ! 

13 i 

14 i 

15 ! 

-j*————————Block 1 S 4—-— — 

©! ( LOCAL‘FORCE FIELD GOODIES ) 

1 ISUBR eraseff FFLAG LDA, A ANA, RZ, A XRA, FFLAG STA, 

212© A MV I, FFTIMER STA, FIELDRAW CALL, RET, 

3[DECIMAL —> 

4 ! 

5 ! 

6 ! 

7 | 









tn ^ 03 m «=* ® m m -j tn 03 w cn-^coN^<s»a)co'J03oi-i^cjN 


-Block 155---— 

( FIREBASE STUFF FOR SPACE INVADERS ) 

HEX SUBR SIFBINTER EXPLODEFE CALL , RET, 

HEX DATA SIFBA SIFBINTER SETI 0C05 E005 SETDDC 
PLAYERANIM AJMP 
DECIMAL —> 


i -B 1 ock 15S- 

! ( GOODIES TO EXPLODE A BOMB ) 

iDATA BOMEEXP 2 E, 5 E, QUAD 1010 E , 0000 E, 0100 B, ©000 E, 
illll B, 0©@9 E, 0190 B, @000 B, 1001 B, ©@00 B, 

[DECIMAL 

[DATA ABEXP © © SETBC BOMEEXP SETP 6 SWA IT NULPAT 
[SETP AHALT 

[ ( ROUTINE TO EXPLODE A BOMB ) 

[SUER BANGBANG ABEXP H LXI, CRASHA CALL, XAMRITE H LXI, 

[L PQRL X SIX, H PQRH X STX, RET, 

[DECIMAL —> 


+-Block 157- 

< CHECK FOR BOMB INTERCEPT ) HEX 
F= CKPHASOR F= CKFF F= FFSL F= FFOK F= FF2L 

SUER INTERBOMB <ASSEMBLE 

0 FEVECTOR Y LX IX, CHECKVEC CALL, CKPHASOR JR2, 

Y PUS.HX, XT IX, EXPLODEFE CALL, X POPX, BANGBANG JMP, 

LABEL CKPHASOR PV1 LI YD, CHECKVEC CALL, CKFF JRZ, 

PQSRH PQS Y REST, BANGBANG JMP, 

LABEL CKFF "FLAG LDA, A AHA, BANGBANG JZ, VYH X C LDX, 0 B MVI, 
@ FIELD A OF H L- v I F DAD, L E MOV, H D MOV, 3 B MV I, 

LABEL FFSL Y {:•. YOV, A AHA, FFOK JFHZ, H I MX, FFSL DJNIZ, 

I BANGBANG LYS 

I LABFI 'ppO'-' '"'A” . . '■'rr . VXH X "tFX» 

i 4 ADI, 7 7-1, ’"'A'M'FDANFi JYC, C DCS, D ' 

l -m - __ V: ~'i /v. r* __ : j r^pjp! ^ V- 

s L C ,? 9 ?« 75 „ g BAEf • 


:X, D PUSH j 
>' DAD, 














+—-—B1 ock 


0 

1 

2 

3 

4 

5 
£ 

7 

8 
9 

10 

11 

12 

13 

14 

15 


0 

1 

2 

3 

4 

5 
£ 

7 

8 
9 

10 

11 

12 

13 

14 

15 

© 

1 

2 

3 

4 

5 

6 


( BOMB INTERCEPT 
5 B MV I , 

LABEL FF2L XTHL, M 
A C MOV, 3 AN I, 2© 
H I NX, XTHL , CAM 
3F AMI, A E MOV, 0 


158- 

CHECKER 


CONTINUED ) 


A MOV, A ANA, 0< >, IF, 

OR!, MAGIC OUT, A XRA, A M MOV, 
^■ ■ RR C, RRC, 

0 MV I, XCHG, D DAD, OFF M MV I, 


mv: 


XCHG, 


H I NX, 0 

50 D'LXI, u UHL', t-ir. 
H POP, EANGBANG JMP, 

ASSEMBLE> 

DECIMAL —> 


H I NX, XTHL, THEN, 


DJMZ, 


+-Block 159- 

< PHASOR INTERCEPT CHECK ROUTINE ) 

DECIMAL F= INTLOG 
SUBR PINTER < ASSEMBLE 
!PINTERFLAG LDA, A ANA, RNZ, 

3 C MV I, CHECKALL CALL, 0< >, IF, 

VI DENT Y A LDX, 2 AN I, ©<>, IF, Y 
X POPX, A XRA, INTLOG JMPR, THEN, 

PGSRH PQS Y RESX, PQSDW PQS Y SETX, 

VYL Y L LDX, VYH Y H LDX, PINTERY SHLD, 

VXL Y L LDX, VXH Y H LDX, PINTERX SHLD, 

VRACK Y C LDX, S C BIT, 0=, IF, XALIVEBITS 
A M MOV, THEN, 1 A MV I, INTLOG UMPR, 

THEN, RACKCHECK CALL, RZ, 2 ft MV I, 

LABEL INTLOG PINTERFLAG STA, C A MOV, 
verase CALL, PQSRH PQS X RESX, 

RET, ASSEMBLE> —> 

-Block 160- 

( BOMB ANIMATION SCORES ) 

HEX 

DATA AE1TBL EOMB1 , E0MB2 , B0MB3 
DATA AB2TBL TOMB 1 , TOMBS , TOMBS 
DATA ABOMBSUB XI WRITE SETR NULPAT 
-80 © SETDC ’ 

FOREVER @ PA TT A SWA IT 2 PAT.I £ FWAIT 4 PAT I 

7 J £ PAT! S SxA."'' 4 FAT I S SKA 17 7 PAT! 6 SWA t T 

8 ‘ DATA: ATM JT:"TL TT’TT ABCMMTUT 

1 fi f ":EC I .- 


PUSHX, XT IX, EANGBANG 


CALL 


'.M XRA. 


PINTERN STAj 


, B0MB4 , 

, T0MB4 . 

SETFP INTERBOMB 


SET! 


S 5 

Evr 


;wa I T 

;rfor 


, fir 


13 i 

14 i 

15 ! 


CALL, 











-I————-B1 ock 


( SUBROUTINE TO DROP A BOMB IF POSSIBLE ) 

HEX F = BITSCL F= BITFND 

SUBR BOMBCHECK <ASSEMBLE BOMBTIMER LDA, A ANA, RNZ, 

LDAR, OF AN I, AC MOV, 3 AN I, 0< >, IF, MASTERY 1 + LDA, 
A B MOV, VYH FEVECTCR LDA, B SUB, CY-, IF, RRC, RPC, 

RRC, RRC, 7 AN I, A C MOV, ELSE, 3 C RES, THEN, THEM, 

0 B MV I, 0 RACKBITS H LX I, B DAD, M A MOV, A ANA, RZ, 
LABEL BITSCL RRC, E I'TFNB JRC, B I NR, EITSCL JMPR, 

LABEL BITFND C ft MOV, RLC, RLC, RLC, E ORA, A C MOV, 
CALCINVX CALL, BOKBBX D LXI, D DAD, MASTERX LDED, D DAD , 
H PUSH, L RALR, H ft MOV, RAL, A B MOV, 

C A MOV, CALCINVY CALL, BOMEDY D LXI, D DAD, 

MASTERY LDED, D DAD, H PUSH, 


+-B 1 ock 


( BOMBER CONTINUED ) 

LDAR, 1 AN I, ©=, IF, ABD1 H LXI, ELSE, ABD2 H LXI, THEN, 


H ' PUSH, 


H PUSH, ( ALIST > B A MOV, 8 SUI, A L MOV, 0 H MV] 
2A4 H LXI, H PUSH, 

INVADERSLEFT LDA, A C MOV, SKILLFACTOR LDA, A ANA. 
LDAR, IF ANI, ELSE, ft XRA, THEN, 

6 ADI, C ADD, BOMBTIMER STA, 

XYVSTART JMF, ASSEMBLE> 

CODE BOMBER X FUSHX , Y PUSHX, EXX, BOHBCHECK CALL 1 
EXX, Y POPX, X FOFX, C SHOVEL INVADERS LEFT ) 

INVADERSLEFT LDA, 5 ADI, TIMEBASE MB2 + STA, 

NEXT 

DECIMAL —> 


-I-Block 183- 

0|( GORF BOUNCE ANIMATION ) 

1 | HEX 

2!DATA BOUNCER © 100 SETDC -10 0 SETDDC GORF SETP 11 SWAIT 
3iGORFB SETP 120 10© SETDC 11 SWAIT ARET 

4|DATA BOUNCEL 0 -ISO SETDC -10 © SETDDC GORF SETP.lt SWAIT 
5[GORFB SETP 120 -100 SETDC 11 SWAIT ARET 
6[DATA BR3 3 AREPEftT BOUNCER ACALL ALOOF ARET 

7 1 DAT A BL3 3 AREPEAT BOUNCEL ACALL A1QOF ARET 


ALOOF 


1 4 \ A'HALT 














-B1 ock 


164- 


0 

1 

2 

3 

4 

5 

6 

7 

8 
9 

10 
11 
12 

13 

14 

15 

0 

1 

2 

3 

4 

5 

6 

7 

8 
S 

10 
1 1 
12 

13 

14 

15 

0 

1 

2 

3 

4 

5 


( UF01 ANIMATION ) 

HEX 

DATA UFO!L XADDWRITE 5ETR 4280 SETXC 0 SETYC 
NULPAT SETFP 

UF02 SETP 0 200 SETDC 20 
© 0 SETDDC 18 3W&.IT 0 -8 

AHALT 

DATA UF01R XADDWR1TE SETR 
NULPAT SETFP UFOS SEIF © 

40 SWA IT © © SETDC 0 0 S 

0 0 SETDDC 3F SWAIT AHALT 
DECIMAL — > 


SWAIT 0 -8 SETDDC 4© SWAIT 0 0 SETDC 
SETDDC 4© SWAIT © © SETDDC 3F SWAIT 

4280 SETXC B4©0 SETYC 
-200 SETDC 2© SWAIT © 8 SETDDC 
TDDC 18 SWAIT © 8 SETDDC 4© SWAIT 


H-Block 165- 

C ANIMATION SEQUENCES FOR 

HEX 

DATA UFOL UFO SETP NULPAT 
© 10© SETDC 78 SWAIT 3C S 
DATA UFOR UFO SETP NULPAT 
© -1©0 SETDC 78 SWAIT 3C 

— > 


UFO ) 

SETFP 410© SETXC © SETYC 
WAIT AHALT 

SETFP 41©0 SETXC 0E400 SETYC 
SWAIT AHALT 


.-—-Block 166-— 

< UFO ANIMATION CONTINUED 
HEX DATA UFOATBL 

43 B, UFOL , 

45 Ei UFO1L 

44 Ei GQRFL 
44 Bi GQRFL 


45 Ei 


FOL , 
UF01L 
GORFR 
GORFR 


) 


43 Bi UFOR , 43 B , UFOR , 

, 45 B, UF01R , 43 B/ UFOR , 

* 45 B 9 UF01R , 43 B * - UFOL / 
, 43 B , UFOL ./ 43 B, UFOR '> 


6!DECIMAL 












m m # to 
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-Block 167- 

< SUBROUTINE TO SEND OVER UFOS ) 

HEX 5UBR UFOCHECKSUBR 
UFOTIMER LDA, A ANA, RNZ, 

LDAR, 7F AN I, 80 ADI, UFOTIMER STA , LDAR, 0F ANI , 

A C MOV , RLC, C AST, A C MOV, 0 B MV I, UFOATBL H LXI , 

B DAD, M C MOV, H LNX, M E MOV, H I NX, M D MOV, 

0 H LXI, H PUSH, H PUSH, D PUSH, B PUSH, IAS H LXI, 

H PUSH, XYVSTART JMP, 

CODE UFOCHECK X PUSHX, Y PUSHX, EXX, UFOCHECKSUBR CALL, 
EXX, Y POPX, X FOFX, NEXT 

DECIMAL —> 


4-—-Block 1 68- 

C SPACE INVADERS RACK SCORE TABLE ) 

HEX 

DATA SIRSTBL 10 , 10 , 20 , 30 , 
DECIMAL —> 


+-Block 163- 

C SPACE INVADERS INITIALIZATION ) HEX 
DATA INVCOLORS 6 B, 7D B, E4 B, A3 B, 
: INITSPACEINV 8 FLOOD IN ITMISSIONRAM 
DRAWN ISSI ONSCREEN 0D 3 GUTF INVCOLORS 
DRAWGROUND RESETRACK 20 INVADERSLEFT 


8 E, 7B E, 5A B, 0F E, 
CL MAKERATS 31 MISSION 
COLOR 

! SKILLSACTOR t IF 2400 


ELSE 2800 TFiEN MASTERX I FD00 DMASTERX \ 

8 © DO 0 I RACKSIIS B! ©FI ALIVEBITS Bf LOOP 


j 8© © DO MASTERY if J 
| AN INSTATE : T '-LOO'" 

I 0 F F L A G ;■ • — T I v ' ' ' 7 F ^ 

S I NVBUuiFEF : TMFMAS^'E- 

J SI RSTBL RS7BL ’ T ~ FI 
j INVNORMLPA” 
i DRAWFF ACT'PT _c 
SDECIMAL —- > 


AN INSTATE 


’IN: 


5TERX @11 + 


h b 


u 


INVADE 


l ? 


PI NTETT 
D U P P V i 


UFA" 

r p ■ 

.,/AG 


RE 


;pATAB 

'* “if ifvJj ■ 
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< CRAB 


—Block 170- 

RACK ENTRY ANIMATION 


) 


DATA RENT 11 SWAIT 
DATA ACRAB1 CRAB!A 
DATA ACRAB2 CRABSA 
DATA ACRAB3 CRAB3A 
TABLE SIDOTEL ACEAI 
— > 


> O SETBC 

5ETP RENT 

:etf rent 

"ETP RENT 

3 , ACRAB3 


RENTGAL SETR 120 SWA IT AHALT 

A JMP 
AJS1P 

A JMP 

ACRAB2 , ACRAE1 , 


-BIock 171- 

( SPACE INVADERS DUMPOUT 
HEX © V = GORFV 
: SI WAIT WTIMER .? BEGIN 
BMS WTIMER 0 O' = END j 


SEGUENCE ) 


FI RECHECK PHASORINTERCEPTCHECK 


: SIDO GETNOD 
BOUNCE 47 1 BE 
4 0 DO 8 0 DO 
I 8 i J + VXL 
J 400 % HASTE 
J SIDOTEL 0 0 
LOOP LOOP 
DECIMAL —> 


GORFV f IASCORE B2MUSIC 
GORFV 0 XVSTART @AA SI WAIT 

GORFV O + O VYL GORFV 0 + 

FX 0 + I 1 ©00 '& 

C 1A2 VMOVE ©A SI WAIT 

SI WAIT j 


40© + 


—,-Block 

( TRANSITION FROM 
DATA GLTCOLORS 8 
DECIMAL 
: TRANSITS TO 
ERASEFF GLTCOLORS 
0 56 14 13S © BOX 
44 H0 R C B OUTP © © 
@ 44 DO " : "~OFCF r ~" 


172- 

MISSION 
B j? 7 D E ^ 


1 TO MISSION 2 ) HEX 

0B Bj 5A Bj a B j f D B; 


0B Bj 5A B j 


COLOR DI @ 0 4 5S 0 BOX 

E I 

OUTP 8 4 OUTP 

r, OUTP El 3 PWAIT -1 +LOOF 


Ji a 
11 •! 
1 P 
1 3 1 
1 4 I 
1 3 I 










-r- (vi n Tt in w r- co tru © w to ^ in 


+-Block 173--- 

0!( CRUDE SPACE INVADERS SCAN LOOP ) 

!: SISCAN EM3 WRTINV FIRECHECK PHASORINTERCEPTCHECK BOMBER 
iDRAWFF UFOCHECK PLAYERHITCHECK ; 

!; SI INITSPACEINV SI DO TH 

{BEGIN SISCAN ENDOFFRAME @ END EMUSIC E2MUSIC 

] GAMEOVER © 0= IF TRANSITS THEN EMUS IC E2MUSIC f 

! HEX AS GSAB U! ' SI GSAB 1+ U! 

! : BEG.INGAME ST ART GAME SKI LLFACTOR'"! • GSAB 1+ © DOIT } 

!DECIMAL }5 


1 

li 


0 

1 

I. 




